(calculate-perl-indent): When indenting under a

containing openparen, skip spaces after the openparen.

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index 67a439da655d7b770b34872832f0f4fa0bdd5404..0ea19973ce1426fbcd5ad0fd3897b6b557cdba9d 100644 (file)
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -516,6 +516,7 @@ Returns (parse-state) if line starts inside a string."
             ;; line is expression, not statement:
             ;; indent to just after the surrounding open.
             (goto-char (1+ containing-sexp))
+            (skip-chars-forward " \t")
             (current-column))
            (t
             ;; Statement level.  Is it a continuation or a new statement?